; Music of Cosmos (1989) (Black System)
; Ripped by Megachur the 28/10/2006

	write "COSMOS.BIN"

music_date_rip	equ &1ca6
music_adr	equ &89b2
first_theme	equ 0
last_theme	equ 0

	read "music_header_v1_0.asm"

;
.init_music
;
	ld a,#01
	ld hl,l8af3
	call #bcbc
	ld a,#02
	ld hl,l8afd
	call #bcbc
	ld a,#03
	ld hl,l8b01
	call #bcbc
	ld a,#04
	ld hl,l8b08
	call #bcbc
	ld a,#01
	ld (l8aee),a
	ld hl,(l8b0f)
	ld (l8af1),hl
	ld hl,l8b11
	ld (l8aef),hl
	ld hl,l8adf
	ld bc,#8100
	ld de,l89ef
	jp #bcd7
;
.play_music
.l89ef
;
	di
	push af
	push de
	push hl
	push bc
	push ix
	push iy
	call l8a06
	pop iy
	pop ix
	pop bc
	pop hl
	pop de
	pop af
	ei
	reti

.l8a06
	ld a,(l8aee)
	dec a
	cp #00
	jp z,l8a13
	ld (l8aee),a
	ret
.l8a13
	ld hl,(l8af1)
	dec hl
	ld a,h
	or l
	jp z,l8a4e

	ld (l8af1),hl
	ld b,#03
	ld ix,(l8aef)
.l8a25
	push bc
	push ix
	ld de,#0001
	ld a,(ix+#00)
	cp #00
	jp z,l8a39
	call l8a60
	ld de,#0005
.l8a39
	pop ix
	pop bc
	add ix,de
	djnz l8a25
	ld a,(ix+#00)
	inc a
	ld (l8aee),a
	inc ix
	ld (l8aef),ix
	ret
.l8a4e
	ld hl,l8b11
	ld (l8aef),hl
	ld hl,(l8b0f)
	ld (l8af1),hl
	ld a,#32
	ld (l8aee),a
	ret
.l8a60
	ld a,(ix+#00)
	or a
	ret z
	ld a,(ix+#04)
	ld iy,l8aa0
.l8a6c
	dec a
	cp #00
	jp z,l8a7a
	ld de,#0009
	add iy,de
	jp l8a6c
.l8a7a
	ld a,(ix+#00)
	ld (iy+#00),a
	ld a,(ix+#01)
	ld (iy+#03),a
	ld a,(ix+#02)
	ld (iy+#04),a
	ld a,(ix+#03)
	ld (iy+#07),a
	ld (iy+#08),#00
	ld (iy+#06),#0f
	push iy
	pop hl
	jp #bcaa
.l8aa0
	db #00,#01,#00,#00,#00,#00,#0f,#00
	db #00,#00,#02,#00,#00,#00,#05,#0f
	db #00,#00,#00,#03,#00,#00,#00,#00
	db #0f,#00,#00,#00,#04,#00,#00,#00
	db #00,#0f,#00,#00,#00,#02,#00,#00
	db #00,#00,#0f,#00,#00,#00,#02,#00
	db #00,#00,#0f,#0f,#00,#00,#00,#02
.l8adf equ $ + 7
	db #00,#00,#00,#19,#0f,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l8aef equ $ + 7
.l8aee equ $ + 6
	db #00,#00,#00,#00,#00,#00,#00,#00
.l8af3 equ $ + 3
.l8af1 equ $ + 1
	db #00,#00,#00,#03,#01,#00,#0a,#0a
.l8afd equ $ + 5
	db #ff,#01,#01,#00,#0a,#01,#0f,#ff
.l8b01 equ $ + 1
	db #03,#02,#0a,#ff,#08,#05,#ff,#04
.l8b08
	db #02,#10,#02,#01,#0f,#ff,#01
.l8b0f
	db #c3
.l8b11 equ $ + 1
	db #00,#01,#3f,#01,#28,#01,#00,#00
	db #0b,#00,#02,#1c,#01,#50,#01,#00
	db #27,#01,#ef,#00,#28,#01,#00,#00
	db #0b,#00,#02,#d5,#00,#50,#01,#00
	db #27,#01,#3f,#01,#28,#01,#00,#00
	db #0b,#00,#02,#1c,#01,#50,#01,#00
	db #27,#01,#be,#00,#28,#01,#00,#00
	db #0b,#00,#02,#d5,#00,#50,#01,#00
	db #27,#01,#3f,#01,#28,#01,#00,#00
	db #0b,#00,#02,#1c,#01,#50,#01,#00
	db #27,#01,#ef,#00,#28,#01,#00,#00
	db #0b,#00,#02,#d5,#00,#50,#01,#00
	db #27,#01,#ef,#00,#28,#01,#00,#00
	db #0b,#00,#02,#fd,#00,#50,#01,#00
	db #27,#01,#3f,#01,#28,#01,#00,#00
	db #0b,#00,#02,#1c,#01,#50,#01,#00
	db #27,#01,#50,#00,#28,#01,#00,#00
	db #0b,#00,#02,#47,#00,#50,#01,#00
	db #27,#01,#3b,#00,#28,#01,#00,#00
	db #0b,#00,#02,#35,#00,#50,#01,#00
	db #27,#01,#50,#00,#28,#01,#00,#00
	db #0b,#00,#02,#47,#00,#50,#01,#00
	db #27,#01,#2f,#00,#28,#01,#00,#00
	db #0b,#00,#02,#35,#00,#50,#01,#00
	db #27,#01,#50,#00,#28,#01,#00,#00
	db #0b,#00,#02,#47,#00,#50,#01,#00
	db #27,#01,#3b,#00,#28,#01,#00,#00
	db #0b,#00,#02,#35,#00,#50,#01,#00
	db #27,#01,#3b,#00,#28,#01,#00,#00
	db #0b,#00,#02,#3f,#00,#50,#01,#00
	db #27,#01,#50,#00,#28,#01,#00,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#47
	db #00,#14,#01,#00,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#47
	db #00,#14,#01,#00,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#59,#00,#14,#01,#00
	db #0b,#00,#02,#59,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#59
	db #00,#14,#01,#00,#0b,#00,#02,#59
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#59,#00,#14,#01,#00
	db #0b,#00,#02,#59,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#59
	db #00,#14,#01,#00,#0b,#00,#02,#50
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#47
	db #00,#14,#01,#00,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#47
	db #00,#14,#01,#00,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#3b,#00,#14,#01,#00
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#00,#0b,#00,#02,#3b
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#3b,#00,#14,#01,#00
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#00,#0b,#00,#02,#3b
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#35,#00,#14,#01,#00
	db #0b,#00,#02,#35,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#35
	db #00,#14,#01,#00,#0b,#00,#02,#35
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#35,#00,#14,#01,#00
	db #0b,#00,#02,#35,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#35
	db #00,#14,#01,#00,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#3b,#00,#14,#01,#00
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#00,#0b,#00,#02,#3b
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#3b,#00,#14,#01,#00
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#00,#0b,#00,#02,#3f
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#04
	db #8e,#00,#14,#03,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#47,#00,#14,#01,#04
	db #8e,#00,#14,#03,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#04
	db #8e,#00,#50,#03,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#59
	db #00,#14,#01,#04,#b3,#00,#14,#03
	db #0b,#00,#02,#59,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#59
	db #00,#14,#01,#04,#b3,#00,#14,#03
	db #0b,#00,#02,#59,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#59
	db #00,#14,#01,#04,#b3,#00,#50,#03
	db #0b,#00,#02,#59,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#59
	db #00,#14,#01,#00,#0b,#00,#02,#50
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#04
	db #9f,#00,#14,#03,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#47,#00,#14,#01,#04
	db #9f,#00,#14,#03,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#04
	db #9f,#00,#50,#03,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#3b
	db #00,#14,#01,#04,#be,#00,#14,#03
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#04,#be,#00,#14,#03
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#3b
	db #00,#14,#01,#04,#be,#00,#50,#03
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#00,#0b,#00,#02,#3b
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#35,#00,#14,#01,#04
	db #8e,#00,#14,#03,#0b,#00,#02,#35
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#35,#00,#14,#01,#04
	db #8e,#00,#14,#03,#0b,#00,#02,#35
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#35,#00,#14,#01,#04
	db #8e,#00,#50,#03,#0b,#00,#02,#35
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#35,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#3b
	db #00,#14,#01,#04,#b3,#00,#14,#03
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#04,#b3,#00,#14,#03
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#3b
	db #00,#14,#01,#04,#b3,#00,#50,#03
	db #0b,#00,#02,#3b,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#3b
	db #00,#14,#01,#00,#0b,#00,#02,#3f
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#47
	db #00,#14,#01,#00,#0b,#00,#02,#47
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#47,#00,#14,#01,#00
	db #0b,#00,#02,#47,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#50
	db #00,#14,#01,#00,#0b,#00,#02,#3f
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#8e,#00,#14,#01,#04
	db #1c,#01,#14,#03,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#8e,#00,#14,#01,#04
	db #1c,#01,#14,#03,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#8e,#00,#14,#01,#04
	db #1c,#01,#50,#03,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#8e,#00,#14,#01,#00
	db #0b,#00,#02,#8e,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#b3
	db #00,#14,#01,#04,#66,#01,#14,#03
	db #0b,#00,#02,#b3,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#b3
	db #00,#14,#01,#04,#66,#01,#14,#03
	db #0b,#00,#02,#b3,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#b3
	db #00,#14,#01,#04,#66,#01,#50,#03
	db #0b,#00,#02,#b3,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#b3
	db #00,#14,#01,#00,#0b,#00,#02,#9f
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#8e,#00,#14,#01,#04
	db #3f,#01,#14,#03,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#8e,#00,#14,#01,#04
	db #3f,#01,#14,#03,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#8e,#00,#14,#01,#04
	db #3f,#01,#50,#03,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#8e,#00,#14,#01,#00
	db #0b,#00,#02,#8e,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#77
	db #00,#14,#01,#04,#7b,#01,#14,#03
	db #0b,#00,#02,#77,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#77
	db #00,#14,#01,#04,#7b,#01,#14,#03
	db #0b,#00,#02,#77,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#77
	db #00,#14,#01,#04,#7b,#01,#50,#03
	db #0b,#00,#02,#77,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#77
	db #00,#14,#01,#00,#0b,#00,#02,#77
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#6a,#00,#14,#01,#04
	db #1c,#01,#14,#03,#0b,#00,#02,#6a
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#6a,#00,#14,#01,#04
	db #1c,#01,#14,#03,#0b,#00,#02,#6a
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#6a,#00,#14,#01,#04
	db #1c,#01,#50,#03,#0b,#00,#02,#6a
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#02,#02,#6a,#00,#14,#01,#00
	db #0b,#00,#02,#8e,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#77
	db #00,#14,#01,#04,#7b,#01,#14,#03
	db #0b,#00,#02,#77,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#77
	db #00,#14,#01,#04,#7b,#01,#14,#03
	db #0b,#00,#02,#77,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#06,#02,#77
	db #00,#14,#01,#04,#7b,#01,#50,#03
	db #0b,#00,#02,#77,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#77
	db #00,#14,#01,#00,#0b,#00,#02,#7f
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#8e,#00,#14,#01,#00
	db #0b,#00,#02,#8e,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#8e
	db #00,#14,#01,#00,#0b,#00,#02,#8e
	db #00,#14,#01,#00,#0b,#01,#00,#00
	db #00,#06,#02,#8e,#00,#14,#01,#00
	db #0b,#00,#02,#8e,#00,#14,#01,#00
	db #0b,#01,#00,#00,#00,#02,#02,#9f
	db #00,#14,#01,#00,#0b,#00,#02,#7f
	db #00,#14,#01,#00,#0b,#01,#1c,#01
	db #14,#01,#02,#8e,#00,#14,#01,#04
	db #47,#00,#14,#01,#0f,#01,#1c,#01
	db #14,#01,#02,#8e,#00,#14,#01,#04
	db #47,#00,#14,#01,#0f,#01,#1c,#01
	db #14,#01,#02,#8e,#00,#14,#01,#04
	db #47,#00,#14,#01,#0f,#00,#00,#00
;
.game_name
	db "Cosmos",0
.game_year
	db "1989",0
.game_publisher
	db "Black System",0
.music_author
	db "",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
